home *** CD-ROM | disk | FTP | other *** search
/ Developer CD Series 1993 April: Penguin on DISC / ADC Developer CD (1993-04) (''Penguin On DISC'')_iso / Dev.CD Apr 93.iso / Utilities / MPW Interfaces 7.1 Beta / PInterfaces / PrintTraps.p < prev    next >
Encoding:
Text File  |  1992-08-28  |  1.0 KB  |  56 lines  |  [TEXT/MPS ]
  1. {
  2.     File:        PrintTraps.p
  3.  
  4.     Contains:    xxx put contents here xxx
  5.  
  6.     Written by:    xxx put writers here xxx
  7.  
  8.     Copyright:    © 1992 by Apple Computer, Inc., all rights reserved.
  9.  
  10. *** Warning: This is an alpha version of the Interfaces for Cube-E. 
  11. ***          Things may change.  Caveat Programmer.
  12.  
  13.  
  14. }
  15.  
  16. {
  17. Created: Tuesday, August 2, 1988 at 9:06 AM
  18.     PrintTraps.p
  19.     Pascal Interface to the Macintosh Libraries
  20.  
  21.     Copyright Apple Computer, Inc.    1985-1988
  22.     All rights reserved
  23. }
  24.  
  25. {This file is provided to support existing references to it. The up to date interface is
  26.    defined in Printing.p
  27. }
  28.  
  29. {$IFC UNDEFINED UsingIncludes}
  30. {$SETC UsingIncludes := 0}
  31. {$ENDC}
  32.  
  33. {$IFC NOT UsingIncludes}
  34.     UNIT PrintTraps;
  35.     INTERFACE
  36. {$ENDC}
  37.  
  38. {$IFC UNDEFINED UsingPrintTraps}
  39. {$SETC UsingPrintTraps := 1}
  40.  
  41. {$I+}
  42. {$SETC PrintTrapsIncludes := UsingIncludes}
  43. {$SETC UsingIncludes := 1}
  44. {$IFC UNDEFINED UsingPrinting}
  45. {$I $$Shell(PInterfaces)Printing.p}
  46. {$ENDC}
  47. {$SETC UsingIncludes := PrintTrapsIncludes}
  48.  
  49.  
  50. {$ENDC}    { UsingPrintTraps }
  51.  
  52. {$IFC NOT UsingIncludes}
  53.     END.
  54. {$ENDC}
  55.  
  56.